00100	\|\\M0BASL30;\M1BASI30;\M2NGR40;\M3NGR25;\M4NGR20;\MFSTA200;
00200	\Y'200;\FFS\F2
00300	\Y'320;\CSTANFORD UNIVERSITY
00400	\F3\CSTANFORD, CALIFORNIA 94305
00500	\F4
00600	
00700	
00800	
00900	CENTER FOR COMPUTER RESEARCH IN MUSIC AND ACOUSTICS\←L\-R\/'7;\+R\→.\→S    Telephone:
01000	ARTIFICIAL INTELLIGENCE LABORATORY\←S\→.(415) 497-4971
01100	\∞MONTH1⊂January⊃\∞MONTH2⊂February⊃\∞MONTH3⊂March⊃\;
01200	\∞MONTH4⊂April⊃\∞MONTH5⊂May⊃\∞MONTH6⊂June⊃\;
01300	\∞MONTH7⊂July⊃\∞MONTH8⊂August⊃\∞MONTH9⊂September⊃\;
01400	\∞MONTH10⊂October⊃\∞MONTH11⊂November⊃\∞MONTH12⊂December⊃\;
01500	\`'40;\8MONTHNAM(STRARG)⊂MONTH⊗STRARG⊗⊃\;
01600	\8CAT(A,B,C)[⊗A⊗⊗B⊗⊗C⊗]\;
01700	\∞DATIME[\u'14;\→D\;
01800	\←D\%=31;\+=1;\P\←D\/=31;\→D\%=12;\+=1;\P\←D\/=12;\+=1964;\→D\;
01900	\qE\qF\!CAT(\\!MONTH,\DE,;); \DF, \DD\;]\;
02000	
02100	\F0\!DATIME;
02200	\←L\+=200;\→l\←R\-=200;\→r\;
02300	
02400	
02500	<NAME, ADDRESS>
02600	
02700	
02800	Dear <NAME>:
02900	
03000	\J
03100	<TEXT>
03200	\.
03300	\←L\→S\←R\-L\/'2;\+L\→L
03400	<SALUTATION>,
03500	
03600	
03700	
03800	
03900	
04000	<YOUR NAME>
04100	<YOUR TITLE>
04200	\←S\→L